home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
World of Amiga
/
World of Amiga.iso
/
archive
/
assembly
/
b-block1.lha
/
boot-kick.S
< prev
next >
Wrap
Text File
|
1980-01-01
|
892b
|
50 lines
org $60000
load $60000
DC.B "DOS",0
dc.l $00000000
dc.l $00000370
move.w #$0737,$dff180
move.w #$0737,$dff182
btst #$6,$bfe001
beq ask2
bra boot
ask2:
btst #$2,$dff016
beq kick
boot:
lea dosname(pc),a1
jsr -96(a6)
move.l d0,a0
move.l 22(a0),a0
moveq #$00,d0
rts
dosname:dc.b "dos.library",0
KICK:
move.l $000004,A6
jsr -150(a6) ; umschalten in supervisormod.
move.w #$2700,sr ; bits 13,10,9,8 im statusregister setzen
move.w #$2700,sr
move.w #$7fff,$dff096 ; 0-14 in dmacon aus
move.w #$7fff,$dff09a ; 0-14 in intena aus
move.w #$00ff,$dff180
move.w #$00ff,$dff180
lea $3f000,a2
lea $7fff0,a3
gone: ;
clr.l (a2)+
cmpa.l a3,a2
bne.s gone
moveq #$00,d0
reset
move.w #$7fff,$dff096
move.w #$7fff,$dff09a
jmp (a1)
dc.b " Written by M.T.C. of The PANTIES ",0,0